home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / stk-3.002 / stk-3 / STk-3.1 / Contrib / STk-wtour / lessons / button1.stk < prev    next >
Encoding:
Text File  |  1996-02-21  |  119 b   |  5 lines
  1. ;; A basic button widget
  2.  
  3. (button '.hello :text "Hello World!" :command (lambda () (display "hello\n")))
  4. (pack .hello)
  5.